home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Win 50 Game+ Vol. 7 (Japan)
/
Win 50 Game+ Vol. 7 (Japan).7z
/
Win 50 Game+ Vol. 7 (Japan).bin
/
lha_file
/
lk4.lzh
/
lk4.exe
/
0
/
RCDATA
/
TFO_MAIN
/
TFO_MAIN.txt
< prev
Wrap
Text File
|
1996-07-28
|
3KB
|
133 lines
object Fo_Main: TFo_Main
Left = 749
Top = 115
BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsSingle
Caption = 'Legend Keiichi 4'
ClientHeight = 384
ClientWidth = 512
Color = clBlack
Font.Color = clWhite
Font.Height = -16
Font.Name = '�l�r �S�V�b�N'
Font.Style = [fsBold]
Icon.Data = {<image000.ico>}
Menu = MainMenu1
Position = poScreenCenter
OnCreate = FormCreate
OnDestroy = FormDestroy
OnKeyDown = FormKeyDown
OnKeyUp = FormKeyUp
OnPaint = FormPaint
PixelsPerInch = 96
TextHeight = 16
object Im_MapChar: TImage
Left = 0
Top = 320
Width = 512
Height = 64
AutoSize = True
Picture.Data = {<image001.bmp>}
Visible = False
end
object Im_Title: TImage
Left = 16
Top = 16
Width = 480
Height = 256
AutoSize = True
Picture.Data = {<image002.bmp>}
Visible = False
end
object Im_Char: TImage
Left = 0
Top = 0
Width = 512
Height = 256
AutoSize = True
Picture.Data = {<image003.bmp>}
Visible = False
end
object Im_CharE: TImage
Left = 32
Top = 32
Width = 512
Height = 384
AutoSize = True
Picture.Data = {<image004.bmp>}
Visible = False
end
object MainMenu1: TMainMenu
Left = 8
Top = 8
object M_Game: TMenuItem
Caption = '�ް�(&G)'
ShortCut = 0
object MG_Start: TMenuItem
Caption = '�ްъJ�n(&G)'
ShortCut = 113
OnClick = MG_StartClick
end
object MG_Stop: TMenuItem
Caption = '�ްђ��f(&E)'
ShortCut = 115
OnClick = MG_StopClick
end
object MG_Sep0: TMenuItem
Caption = '-'
ShortCut = 0
end
object MG_Exit: TMenuItem
Caption = '�I��(&X)'
ShortCut = 0
OnClick = MG_ExitClick
end
end
object M_Setup: TMenuItem
Caption = '�ݒ�(&S)'
ShortCut = 0
object MS_BGM: TMenuItem
Caption = 'BGM ON(&B)'
Checked = True
ShortCut = 0
OnClick = MS_BGMClick
end
object MS_Sound: TMenuItem
Caption = '���ʉ�ON(&S)'
Checked = True
ShortCut = 0
OnClick = MS_SoundClick
end
end
object M_Help: TMenuItem
Caption = '����(&H)'
ShortCut = 0
object MH_Contents: TMenuItem
Caption = '�ڎ�(&C)'
ShortCut = 112
OnClick = MH_ContentsClick
end
object MH_HomePage: TMenuItem
Caption = 'Frieve Home Page(&H)'
ShortCut = 0
OnClick = MH_HomePageClick
end
object MH_Sep0: TMenuItem
Caption = '-'
ShortCut = 0
end
object MH_About: TMenuItem
Caption = '�ް�ޮݏ��(&A)...'
ShortCut = 0
OnClick = MH_AboutClick
end
end
end
object Ti_Main: TTimer
Interval = 30
OnTimer = Ti_MainTimer
Left = 40
Top = 8
end
end